home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Collection of Tools & Utilities
/
Collection of Tools and Utilities.iso
/
dskut
/
wd.zip
/
READ100
< prev
next >
Wrap
Text File
|
1988-02-04
|
1KB
|
38 lines
* this is a sample batch file called "READ100" and comes with the EVAL disk
* this file will read 100 cylinders 10 times and pause between each main loop
* set program vars
var3 = 100 * max cyl
var5 = 1 * number of main loop
* set up drive parameters
reset * reset drive
heads = 4 * max number of heads
sectors = 17 * max number of sectors
cyl = 614 * max number of cylinders
idc * setdrive params
recal * set on cylinder zero
recal * set on cylinder zero
b = 17 * set block size
* start of main body
print(start of main body)
while(var5 < 10) * start of ten times loop
h = 0 * head count
s = 1 * sector count
var8 = 0,c = 0 * cyclinder count
while(var8 < var3) * start of cyl loop
r,inch #4 * read cyclinder
var8 += 1 * next cyl
ewhile * end of cyl loop
print(100 cylinders read pass :) * print msg
show(var5) * display var5
var5 += 1
pause * wait for key pressed
ewhile * end of 10 times loop
print(100 cylinders read pass :) * print msg
show(var5) * display var5
pause
print(x)
end * end of bat file